(display-splash-screen): Allow a prefix argument.

diff --git a/lisp/startup.el b/lisp/startup.el
index cd256f2ced0639896a9c7279f479665cafd24f02..664fd285754addaa0892b70db69aae0ca139c49d 100644 (file)
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1626,8 +1626,9 @@ Type \\[describe-distribution] for information on getting the latest version."))
 (defun display-splash-screen (&optional hide-on-input)
   "Display splash screen according to display.
 Fancy splash screens are used on graphic displays,
-normal otherwise."
-  (interactive)
+normal otherwise.
+With a prefix argument, any user input hides the splash screen."
+  (interactive "P")
   (if (use-fancy-splash-screens-p)
       (fancy-splash-screens hide-on-input)
     (normal-splash-screen hide-on-input)))